
Graphics 640,480

While Not KeyHit(KEY_ESCAPE)
	Cls
		Plot MouseX(),MouseY()
		Plot 100,330
		DrawText ATan2(MouseY()-330,MouseX()-100),0,0
	Flip
Wend
